home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
comm
/
misc
/
avmNfax1_33.lha
/
AVMSuite
/
rexx
/
startgpfax.avm
< prev
next >
Wrap
Text File
|
1994-06-24
|
412b
|
21 lines
/* needed for some of the functions we use */
call addlib("rexxsupport.library", 0, -30, 0)
gpfaxrunning = show('p', 'REXX_GPFAX')
call pragma('d', 'gpfax:')
if ~gpfaxrunning then do
address command "run >nil: <nil: gpfax:gpfax -W -NP -Q -z -S"
end
do 5
call delay(100)
gpfaxrunning = show('p', 'REXX_GPFAX')
if gpfaxrunning then break
end
address rexx_gpfax openserial
address rexx_gpfax unlisten